﻿Public Class CatServidoresBE
    Private _Id As Integer
    Private _Descripcion As String
    Private _Host As String
    Private _Puerto As String
    Private _Usuario As String
    Private _Pass As String
    Private _Status As EstatusServidor
    Private _CantidadBD As Integer
    Private _DisponiblesBD As Integer

    Public Enum EstatusServidor
        Activo
        Inactivo
    End Enum

    Public Property Id() As Integer
        Get
            Return _Id
        End Get
        Set(ByVal value As Integer)
            _Id = value
        End Set
    End Property

    Public Property Descripcion() As String
        Get
            Return _Descripcion
        End Get
        Set(ByVal value As String)
            _Descripcion = value
        End Set
    End Property

    Public Property Host() As String
        Get
            Return _Host
        End Get
        Set(ByVal value As String)
            _Host = value
        End Set
    End Property

    Public Property Puerto() As String
        Get
            Return _Puerto
        End Get
        Set(ByVal value As String)
            _Puerto = value
        End Set
    End Property

    Public Property Usuario() As String
        Get
            Return _Usuario
        End Get
        Set(ByVal value As String)
            _Usuario = value
        End Set
    End Property

    Public Property Pass() As String
        Get
            Return _Pass
        End Get
        Set(ByVal value As String)
            _Pass = value
        End Set
    End Property

    Public Property Status() As EstatusServidor
        Get
            Return _Status
        End Get
        Set(ByVal value As EstatusServidor)
            _Status = value
        End Set
    End Property

    Public Property CantidadBD() As Integer
        Get
            Return _CantidadBD
        End Get
        Set(ByVal value As Integer)
            _CantidadBD = value
        End Set
    End Property

    Public Property CantDisponiblesBD() As Integer
        Get
            Return _DisponiblesBD
        End Get
        Set(ByVal value As Integer)
            _DisponiblesBD = value
        End Set
    End Property

End Class
